home *** CD-ROM | disk | FTP | other *** search
/ Mission to McDonaldLand / Mission To McDonaldLand.iso / code.cst / 00057_Script_ob3 special < prev    next >
Text File  |  1998-10-29  |  1KB  |  49 lines
  1. on mouseDown
  2.   global objects
  3.   global castrestore
  4.   global restoration
  5.   global nomore
  6.   global soundstuff2
  7.   global fixit
  8.   if objects = 2 then
  9.     puppetSound 1, the castnum of sprite 13 + 2
  10.     set the member of sprite 11 = "blank"
  11.     set the member of sprite 12 = "blank"
  12.     set the member of sprite 13 = "blank"
  13.     set the member of sprite 56 = "COB3"
  14.     set the member of sprite 16 = "bench"
  15.     set objects = 3
  16.   else 
  17.     puppetSound 1, the castnum of sprite 13 + 1
  18.     set the member of sprite restoration = castrestore
  19.     set castrestore = the castnum of sprite 17
  20.     set restoration = 17
  21.     set the member of sprite 17 = the castnum of sprite 17 - 1
  22.     set nomore = 1
  23.     set soundstuff2 = 1
  24.   end if
  25.   
  26.   if objects = 1 then
  27.     puppetSound "notools"
  28.     set the member of sprite 56 = "blank"
  29.     set the member of sprite 16 = "onbench"
  30.     set the member of sprite restoration = castrestore
  31.     set castrestore = the castnum of sprite 17
  32.     set restoration = 17
  33.     set the member of sprite 17 = the castnum of sprite 17 - 1
  34.     set nomore = 1
  35.     set soundstuff2 = 1
  36.     set fixit = 1
  37.   end if
  38.   
  39. end
  40.  
  41. on enterFrame me
  42.   global castrestore
  43.   global restoration
  44.   global soundstuff2
  45.   if SoundBusy(1) = FALSE and soundstuff2 = 1 then 
  46.     set the member of sprite restoration = castrestore
  47.     set soundstuff2 = 0
  48.   end if
  49. end